home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Franz PD / Franz PD Disk #337 (1994-06)(Rhein-Sieg-Soft).zip / Franz PD Disk #337 (1994-06)(Rhein-Sieg-Soft).adf / BootTool2 / BBSources / StandartBB.asm < prev   
Assembly Source File  |  1994-04-26  |  577b  |  37 lines
  1.  
  2. ; Assembler: DevPac 2.14
  3.  
  4. ; use Tab 11
  5.  
  6. *****  Standart_OS2.0-Bootblock  *****
  7.  
  8. bootcode    dc.l    $444f5300        ; Standart-Bootcode
  9.     dc.l    $00000000
  10.     dc.l    $00000370
  11.  
  12.     lea    exp_lib(pc),a1
  13.     moveq    #37,d0
  14.     jsr    -552(a6)        ; _LVOOpenLibrary
  15.     tst.l    d0
  16.     beq.s    .no_explib
  17.     movea.l    d0,a1
  18.     bset    #6,34(a1)
  19.     jsr    -414(a6)        ; _LVOCloseLibrary
  20. .no_explib    lea    dos_lib(pc),a1
  21.     jsr    -96(a6)        ; _LVOFindResident
  22.     tst.l    d0
  23.     beq.s    .not_found
  24.     movea.l    d0,a0
  25.     movea.l    22(a0),a0
  26.     moveq    #0,d0
  27.     rts
  28. .not_found    moveq    #-1,d0
  29.     rts
  30.     
  31. exp_lib    dc.b    "expansion.library",0
  32. dos_lib    dc.b    "dos.library",0
  33.  
  34. bootcode_end
  35.  
  36.     end
  37.